object fmDict: TfmDict
  Left = 390
  Top = 251
  Width = 427
  Height = 519
  Caption = 'fmDict'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object tbCode: TsToolBar
    Left = 0
    Top = 0
    Width = 419
    Height = 42
    ButtonHeight = 35
    ButtonWidth = 35
    Caption = 'tbCode'
    Images = fmMain.ilistCrud
    TabOrder = 0
    SkinData.SkinSection = 'TOOLBAR'
    object btnFirstSep: TToolButton
      Left = 0
      Top = 2
      Width = 6
      Caption = 'btnFirstSep'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object btnAddCode: TToolButton
      Left = 6
      Top = 2
      Action = actInsert
      ParentShowHint = False
      ShowHint = True
    end
    object btnCopy: TToolButton
      Left = 41
      Top = 2
      Action = actCopy
      ParentShowHint = False
      ShowHint = True
    end
    object btnDeleteCode: TToolButton
      Left = 76
      Top = 2
      Action = actDelete
      ParentShowHint = False
      ShowHint = True
    end
    object btnSep: TToolButton
      Left = 111
      Top = 2
      Width = 7
      Caption = 'btnSep'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object btnSave: TToolButton
      Left = 118
      Top = 2
      Action = actPost
      ParentShowHint = False
      ShowHint = True
    end
  end
  object dbgDict: TDBGridEh
    Left = 0
    Top = 42
    Width = 419
    Height = 443
    Align = alClient
    DataSource = dsDict
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnTitleBtnClick = dbgDictTitleBtnClick
  end
  object dsDict: TDataSource
    Left = 376
    Top = 48
  end
  object actlstDict: TActionList
    Images = fmMain.ilistCrud
    Left = 200
    Top = 16
    object actInsert: TDataSetInsert
      Category = 'Dataset'
      Caption = #1044#1086#1073#1072#1074#1080#1090#1100
      Hint = #1044#1086#1073#1072#1074#1080#1090#1100
      ImageIndex = 0
      ShortCut = 45
      OnExecute = btnAddCodeClick
      DataSource = dsDict
    end
    object actDelete: TDataSetDelete
      Category = 'Dataset'
      Caption = #1059#1076#1072#1083#1080#1090#1100
      Hint = #1059#1076#1072#1083#1080#1090#1100
      ImageIndex = 2
      ShortCut = 16430
      OnExecute = btnDeleteCodeClick
      DataSource = dsDict
    end
    object actCopy: TDataSetEdit
      Category = 'Dataset'
      Caption = #1050#1086#1087#1080#1103
      Hint = #1050#1086#1087#1080#1103
      ImageIndex = 8
      ShortCut = 16451
      OnExecute = btnCopyClick
      DataSource = dsDict
    end
    object actPost: TDataSetPost
      Category = 'Dataset'
      Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
      Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100
      ImageIndex = 9
      ShortCut = 16467
      OnExecute = btnSaveClick
      DataSource = dsDict
    end
  end
end
